home *** CD-ROM | disk | FTP | other *** search
-
- #define __GCINIT__
-
- #include "gcoope10.h"
-
- /* generic function declarations */
-
- MAKEGEN(addressOf);
- MAKEGEN(reSize);
- MAKEGEN(getElem);
- MAKEGEN(putElem);
- MAKEGEN(sizeOf);
- MAKEGEN(numElems);
- MAKEGEN(changeVal);
- MAKEGEN(valueOf);
- MAKEGEN(asString);
- MAKEGEN(asHexStr);
- MAKEGEN(asShortInt);
- MAKEGEN(asLongInt);
- MAKEGEN(asUnsigned);
- MAKEGEN(addUnit);
- MAKEGEN(rmvUnit);
- MAKEGEN(getUnit);
- MAKEGEN(compact);
- MAKEGEN(asPointer);
- MAKEGEN(getPos);
- MAKEGEN(setPos);
- MAKEGEN(putByte);
- MAKEGEN(getByte);
- MAKEGEN(strmErr);
- MAKEGEN(clrErr);
- MAKEGEN(Putc);
- MAKEGEN(Getc);
- MAKEGEN(UnGet);
- MAKEGEN(Puts);
- MAKEGEN(Gets);
- MAKEGEN(Write);
- MAKEGEN(Read);
- MAKEGEN(SetBuf);
- MAKEGEN(Flush);
- MAKEGEN(Stat);
- MAKEGEN(lengthOf);
- MAKEGEN(asChar);
-
-
- stat gcInit(void)
- {
- stat retVal=FUNCFAIL;
-
- /* install kernel shells */
-
- INSTALL_CLASS(Object);
- INSTALL_CLASS(Class);
-
- /* install generic functions */
-
- INSTGEN(addressOf);
- INSTGEN(reSize);
- INSTGEN(getElem);
- INSTGEN(putElem);
- INSTGEN(sizeOf);
- INSTGEN(numElems);
- INSTGEN(changeVal);
- INSTGEN(valueOf);
- INSTGEN(asString);
- INSTGEN(asHexStr);
- INSTGEN(asShortInt);
- INSTGEN(asLongInt);
- INSTGEN(asUnsigned);
- INSTGEN(addUnit);
- INSTGEN(rmvUnit);
- INSTGEN(getUnit);
- INSTGEN(compact);
- INSTGEN(asPointer);
- INSTGEN(getPos);
- INSTGEN(setPos);
- INSTGEN(putByte);
- INSTGEN(getByte);
- INSTGEN(strmErr);
- INSTGEN(clrErr);
- INSTGEN(Putc);
- INSTGEN(Getc);
- INSTGEN(UnGet);
- INSTGEN(Puts);
- INSTGEN(Gets);
- INSTGEN(Write);
- INSTGEN(Read);
- INSTGEN(SetBuf);
- INSTGEN(Flush);
- INSTGEN(Stat);
- INSTGEN(lengthOf);
- INSTGEN(asChar);
-
- /* install classes */
-
- INSTALL_CLASS(Char);
- INSTALL_CLASS(ShortInt);
- INSTALL_CLASS(Unsigned);
- INSTALL_CLASS(LongInt);
- INSTALL_CLASS(Pointer);
- INSTALL_CLASS(Dynmem);
- INSTALL_CLASS(Collection);
- INSTALL_CLASS(Array);
- INSTALL_CLASS(LowStream);
- INSTALL_CLASS(String);
- INSTALL_CLASS(StdStream);
- INSTALL_CLASS(Stream);
- INSTALL_CLASS(File);
-
- retVal=FUNCOKAY;
-
- err:
- return retVal;
- }